Apple Reference & Presen…rary 6 (Reseller Edition)/Apple Ref. & Pres. Lib.v6.0.toast/pc/1-Reference/Apple Literature Guide/Apple Literature Guide 6.0/background_4166.xml

Extensible Markup Language | 1990-12-20 | 23KB | 583 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>4166</id>
    <filler1>0</filler1>
    <bitmap>BMAP_5403.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_3164.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>8</left>
            <top>63</top>
            <right>311</right>
            <bottom>103</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>18</textSize>
        <textStyle>plain</textStyle>
        <textHeight>20</textHeight>
        <name>Title</name>
        <script></script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>130</left>
            <top>110</top>
            <right>314</right>
            <bottom>143</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <textHeight>18</textHeight>
        <name>Other Data</name>
        <script></script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>9</left>
            <top>110</top>
            <right>96</right>
            <bottom>143</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <textHeight>18</textHeight>
        <name></name>
        <script></script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>13</left>
            <top>153</top>
            <right>306</right>
            <bottom>302</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Helvetica</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Description</name>
        <script></script>
    </part>
    <part>
        <id>5</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>60</left>
            <top>313</top>
            <right>109</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Help</name>
        <script>on mouseUpLinkToHelp -- "Lit"end mouseUp</script>
    </part>
    <part>
        <id>6</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>7</left>
            <top>313</top>
            <right>58</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Quit</name>
        <script>on mouseUpLinkToQuitend mouseUp</script>
    </part>
    <part>
        <id>7</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>111</left>
            <top>313</top>
            <right>162</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Search</name>
        <script>on mouseUpLinkToSearchend mouseUp</script>
    </part>
    <part>
        <id>8</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>391</left>
            <top>313</top>
            <right>438</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Order Form</name>
        <script>on mouseUpglobal gLastMenuLinkToCard item 1 of gLastMenu,"iris Close"end mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>483</left>
            <top>314</top>
            <right>502</right>
            <bottom>335</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Next</name>
        <script>on MouseUpglobal gOtherCdList6get doubleClick()if gOtherCdList6 = "" thenlock screengo next cd of this bgunlock screen with scroll leftelseadd 1 to line 1 of gOtherCdList6LinkToCard Line (line 1 of gOtherCdList6) of gOtherCdList6,"scroll left"end ifEnd MouseUp</script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>441</left>
            <top>314</top>
            <right>460</right>
            <bottom>335</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Prev</name>
        <script>on MouseUpglobal gOtherCdList6get doubleClick()if gOtherCdList6 = "" thenlock screengo prev cd of this bgunlock screen with scroll rightelsesubtract 1 from line 1 of gOtherCdList6LinkToCard (Line (line 1 of gOtherCdList6) of gOtherCdList6),"scroll right"end ifEnd MouseUp</script>
    </part>
    <part>
        <id>13</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>229</left>
            <top>313</top>
            <right>275</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Print</name>
        <script>on mouseUpprintPres fld "files"end mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>179</left>
            <top>313</top>
            <right>227</right>
            <bottom>336</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>View</name>
        <script>on mouseUpshowPres fld "files"end mouseUp</script>
    </part>
    <part>
        <id>15</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>31</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Monaco</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Files</name>
        <script></script>
    </part>
    <part>
        <id>16</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>222</left>
            <top>110</top>
            <right>253</right>
            <bottom>124</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>right</textAlign>
        <font>Helvetica</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Units</name>
        <script></script>
    </part>
    <part>
        <id>17</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>180</left>
            <top>314</top>
            <right>226</right>
            <bottom>335</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>5850</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>View Hider</name>
        <script></script>
    </part>
    <part>
        <id>18</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>230</left>
            <top>314</top>
            <right>274</right>
            <bottom>335</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>26651</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Print Hider</name>
        <script></script>
    </part>
    <part>
        <id>19</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>441</left>
            <top>314</top>
            <right>460</right>
            <bottom>335</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>30642</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Prev Hide</name>
        <script></script>
    </part>
    <part>
        <id>20</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>482</left>
            <top>314</top>
            <right>501</right>
            <bottom>335</bottom>
        </rect>
        <style>opaque</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>15846</icon>
        <textAlign>center</textAlign>
        <font>C Futura Condensed</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <name>Next Hide</name>
        <script></script>
    </part>
    <content>
        <layer>background</layer>
        <id>3</id>
        <text>Part Number  Category</text>
    </content>
    <name>Literature</name>
    <script>on arrowKey wif w = "right" then click at loc of bg btn "Next"else if w = "Left" then click at loc of bg btn "Prev"end arrowKeyon openCardglobal gOtherCdList6,gNoLaunch6,gCDVolume6spinCursorif gNoLaunch6 contains "True" thenif gNoLaunch6 contains "Volume" thenspinCursorif lineOffset(gCDVolume6,volumeList()) > 0 then put false into gNoLaunch6end ifend ifget (gNoLaunch6 contains true or fld "Files" = "")set visible of bg btn "View Hider" to itset visible of bg btn "Print Hider" to itspinCursorput number of lines of gOtherCdList6 into numLinesif numLines = 0 thenhide bg btn "Next Hide"hide bg btn "Prev Hide"else if numLines ≤ 2 thenshow bg btn "Next Hide"show bg btn "Prev Hide"elseput line 1 of gOtherCdList6 into thisCdif thisCd = numLines thenshow bg btn "Next Hide"else hide bg btn "Next Hide"if thisCd = 2 thenshow bg btn "Prev Hide"else hide bg btn "Prev Hide"end ifspinCursorget line 1 of fld "Other Data"--// Reseller--// set visible of bg btn "Order Dimmed" to (it = "" or char 1 of it = "P")end openCardon showPres presStringglobal gTheDepths6,gPaths6,gAppList6,gCDVolume6,MFinderspinCursor--•• Split param into varsput "" into appRAMput item 1 of presString into presPathput item 2 of presString into whichAppput "1 8" into availDepths--•• Build Path to Presentationput gCDVolume6 before presPathif last char of presPath is "," then delete last char of presPath--•• figure out which app to launchif number of chars in whichApp ≤ 4 thenif whichApp is not "APPL" thenspinCursorput lineItemOffset(whichApp,gAppList6) into lineNumput item 2 of line lineNum of gAppList6 into appNameput item 3 of line lineNum of gAppList6 into appRAMput gCDVolume6&line 2 of gPaths6 before appNameelseput presPath into appNameput "" into presPathend ifelseput whichApp into appNameput gCDVolume6 before appNameend if--•• Check memoryget item 6 of presStringif it is not "" thenput it into appRAMelse--// if appRAM is empty then put something into itif "STAK" is not in whichApp and appRAM = "" thenput item 1 of APPLsize(appName,"nodialog:ErrorMessage") ¬into minMem--// assume this error is lack of SIZE resource, not fatal errorif ErrorMessage is "Could not load ‘SIZE’ resources" thenput 512 into minMemput empty into ErrorMessageend ifput minMem div 1024 into appRAMend ifend if--•• See if Application is already Openif MFinder thenspinCursorput ApplicationList() into appsOpenput RemovePath(appName) into shortAppNameif shortAppName is in appsOpen and "HyperCard" is not in shortAppName thenanswer "Sorry, the application is already open."& return &¬"“Continue” will switch to the application - from there you may use the “Open” menu item "&¬"or Quit the application and re-click the “View” button." with "Cancel" or "Continue"if it = "Continue" thenanswer "The presentation you wish to view is located in "&¬"the folder:"& return & Pathway(presPath) with "Continue"domenu shortAppNameend ifexit showPresend ifend if--•• Check memoryput (round (.95*(applMemory() div 1024))) into freeMem                     --// XFCNif freeMem < appRam thenbeepanswer "There is not enough memory available to view this "&¬"data sheet!" & return & "Required : "& appRAM & "K" & return &¬"Available : "&freeMem & "K"exit showPresend if--•• Offer option to view B/W or Color if appropriateif number of words of availDepths > 1 and line 3 of gTheDepths6 ≥ 8thenput 8 into reqDepthelse if line 3 of gTheDepths6 = 1 thenif first word of availDepths > line 3 of gTheDepths6 thenbeepanswer "This graphic requires a color monitor!"exit showPreselse put 1 into reqDepthelse put availDepths into reqDepth--•• Switch bit depthif number of words of reqDepth = 1 thenspinCursorif reqDepth = 1 thenput "gray" into colorTypeelse put "Color" into colorTypeSwitchXRoo reqDepth,colorTypeif word 1 of the result is "Error" thenbeepput true & return & "Monitor" into gNoLaunch6answer "Unable to switch monitor bit depths. If you wish "&¬"to view the presentation, please change the bit depth "&¬"setting (in the Control Panel) to "& quote & reqDepth &¬quote &".  After setting the depth, hit the "&¬"“View” button again." with "Control Panel" or "Cancel"if it = "Control Panel" then doMenu "Control Panel"exit showPresend ifput reqDepth into line 2 of gTheDepths6end if--•• HyperCard limit of 150 chars in paths? Should never happenput number of chars of presPath into pathCharsif pathChars ≥ 150 thenanswer "The path is too long. It has " & pathChars & " characters."exit to hyperCardend if--•• Ready to open presentationshow menuBarset cursor to 4open presPath with appNameend showPreson printPres presStringglobal gTheDepths6,gPaths6,gAppList6,gCDVolume6,MFinderspinCursor--•• Split param into varsput item 1 of presString into presPathput item 2 of presString into whichAppput item 3 of presString into availDepths--•• Build Path to Presentationput gCDVolume6 before presPathif last char of presPath is "," then delete last char of presPath--•• figure out which app to launchif number of chars in whichApp ≤ 4 thenif whichApp is not "APPL" thenspinCursorput lineItemOffset(whichApp,gAppList6) into lineNumput item 2 of line lineNum of gAppList6 into appNameput item 3 of line lineNum of gAppList6 into appRAMput gCDVolume6 & line 2 of gPaths6 before appNameelseput presPath into appNameput "" into presPathend ifelseput whichApp into appNameput gCDVolume6 before appNameend if--•• See if Application is already Openif MFinder thenspinCursorput ApplicationList() into appsOpenput RemovePath(appName) into shortAppNameif shortAppName is in appsOpen and¬"HyperCard" is not in shortAppName thenanswer "Sorry, the application is already open."& return &¬"“Continue” will switch to the application - "&¬"from there you may use the “Open” menu item or Quit the "&¬"application and re-click the “Print” button."¬with "Cancel" or "Continue"if it = "Continue" thenanswer "The presentation you wish to view is located in "&¬"the folder:"& return & Pathway(presPath) with "Continue"domenu shortAppNameend ifexit PrintPresend ifend if--•• Check memoryget item 6 of presStringif it is not "" then put it into appRAMput (round (.95*(applMemory() div 1024))) into freeMem                     --// XFCNif freeMem < appRam thenbeepanswer "There is not enough memory available to open and print this "&¬"data sheet!" & return & "Required : "& appRAM & "K" & return &¬"Available : "&freeMem & "K"exit printPresend if--•• HyperCard limit of 150 chars in paths? Should never happenput number of chars of presPath into pathCharsif pathChars ≥ 150 thenanswer "The path is too long. It has " & pathChars & " characters."exit to hyperCardend if--•• Ready to print presentationspinCursorprint presPath with appNameend printPres</script>
</background>